home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1995 March / Macworld CD-ROM (March 1995).cdr / Demos / MacDraft 4.0 / MacDraft 4.0 Demo / MacDraft 4.0 Demo.rsrc / PREC_105_IddDict < prev    next >
Encoding:
Text File  |  1995-02-01  |  39.8 KB  |  5 lines

  1. %%BeginProcSet: "(AppleDict md)" 71 0
  2. userdict/LW{save statusdict/product get(LaserWriter)anchorsearch
  3. exch pop{dup length 0 eq{pop 1}{( Plus)eq{2}{3}ifelse}ifelse}{0}ifelse exch restore}bind put
  4. userdict/patchOK known not{save LW dup 1 ne exch 2 ne and false<1861AEDAE118A9F95F1629C0137F8FE656811DD93DFBEA65E947502E78BA12284B8A58EF0A3
  5. 2E272778DAA2ABEC72A84102D591E11D96BA61F57877B895A752D9BEAAC3DFD7D3220E2BDE7C036467464E0E836748F1DE7AB6216866F130CE7CFCEC8CE050B870C11881EE3E9D70919>{eexec}stopped{dup type/stringtype eq{pop}if}if and exch restore userdict/patchOK 3 -1 roll put} if
  6. userdict/downloadOK known not{userdict/downloadOK{ vmstatus exch sub exch pop 120000 gt patchOK and}bind put}if
  7. userdict/type42known known not{userdict/type42known systemdict/resourcestatus known{42/FontType resourcestatus{pop pop true}{false}ifelse }{false}ifelse put}if
  8. type42known not downloadOK and {userdict begin /*charpath /charpath load def/charpathflag false def/charpath{userdict/charpathflag true put userdict/*charpath get exec userdict/charpathflag false put}bind def end}if
  9. userdict/checkload known not{userdict/checkload{{pop exec} {save 3 dict begin/mystring 6050 string def
  10. exch/endstring exch def{currentfile mystring readline not{stop}if endstring eq{exit}if}loop end restore pop}ifelse}bind put}if
  11. userdict/LW+{LW 2 eq}bind put
  12. userdict/ok known not{userdict/ok{systemdict/statusdict known dup{LW 0 gt and}if}bind put}if
  13. systemdict/setobjectformat known{0 setobjectformat}if
  14. systemdict/currentpacking known{currentpacking true setpacking}if
  15. /md 270 dict def md begin
  16. /av 71 def
  17. /T true def/F false def/mtx matrix def/s75 75 string def/sa8 8 string def/sb8 8 string def
  18. /sc8 8 string def/sd8 8 string def/s1 ( ) def/pxs 1 def/pys 1 def
  19. /ns false def
  20. 1 0 mtx defaultmatrix dtransform exch atan/pa exch def/nlw .24 def/ppr [-32 -29.52 762 582.48] def
  21. /pgr [0 0 0 0] def
  22. /pgs 1 def/por true def/xb 500 array def/so true def/tso true def/fillflag false def/pnm 1 def/fmv true def
  23. /sfl false def/ma 0 def/invertflag false def/dbinvertflag false def/xflip false def/yflip false def/noflips true def/scaleby96 false def/fNote true def/fBitStretch true def
  24. /4colors false def
  25. /feedsource [0 0 0 0] def
  26. /feedpriority [0] def
  27. /fg (Rvd\001\001\000\000\177) def
  28. /bdf{bind def}bind def
  29. /xdf{exch def}bdf
  30. /xl{neg exch neg translate}bdf
  31. /fp{pnsh 0 ne pnsv 0 ne and}bdf
  32. /nop{}bdf/lnop[/nop load]cvx bdf
  33. /vrb[
  34. {fp{fg 6 get 0 ne{gsave stroke grestore}{gsave 1 setlinewidth pnsh pnsv scale stroke grestore}ifelse}if newpath}bind
  35. /eofill load
  36. dup
  37. /newpath load
  38. 2 index
  39. dup
  40. {clip newpath}bind
  41. {}bind
  42. dup
  43. 2 copy
  44. ]def
  45. /sgd systemdict/setpagedevice known{{pop}}{{pop}}ifelse bdf
  46. /svsc systemdict/currentcolorscreen known{{currentcolorscreen/dkspf xdf/dkrot xdf/dkfreq xdf/dyspf xdf/dyrot xdf/dyfreq xdf/dmspf xdf/dmrot xdf/dmfreq xdf
  47. /dcspf xdf/dcrot xdf/dcfreq xdf}}{{currentscreen/spf xdf/rot xdf/freq xdf}}ifelse bdf
  48. /adjustpagedevice{/pagedevicedict xdf
  49. matrix currentmatrix
  50. currenttransfer currentgray
  51. systemdict/currentcolorscreen known{currentcolorscreen true}{currentscreen false}ifelse
  52. pagedevicedict setpagedevice
  53. {setcolorscreen}{setscreen}ifelse
  54. setgray settransfer setmatrix
  55. invertflag{gsave newpath clippath 1 setgray fill grestore}if
  56. }bdf
  57. /isntr{statusdict begin/product load end(LaserWriter Personal NTR)eq}bdf
  58. /islwpro{statusdict begin/product load end dup(LaserWriter Pro 630)eq
  59. exch(LaserWriter Pro 600)eq or}bdf
  60. /isnewsource{feedsource 1 get 1 eq{feedsource 0 get 2 ge{feedsource 2 get feedsource 3 get ne}{true}ifelse
  61. }{feedsource 0 get 2 ge{feedsource 2 get 255 and feedsource 3 get 255 and ne}{false}ifelse
  62. }ifelse}bdf
  63. /setmultipurposepagesize{systemdict/setpagedevice known{isntr{0}{islwpro{1}{-1}ifelse}ifelse
  64. dup 0 ge{1 dict dup begin/InputAttributes 1 dict dup 4 index
  65. 1 dict dup/PageSize currentpagedevice/PageSize get put put def end adjustpagedevice
  66. }if pop}if}bdf
  67. /selectmediasource{systemdict/setpagedevice known not{feedsource 1 0 put}if
  68. isnewsource{feedsource 0 get 2 ge {2}{1}ifelse
  69. 2 eq{feedsource 3 get 255 and dup 0 eq{pop fm{false se}if}{dup/ma exch def 0 gt{fm se/t1 5 st ok ma 1 gt and{/t2 0 st/t3 0 st
  70. statusdict/manualfeedtimeout 3600 put}if}if}ifelse}if
  71. feedsource 1 get 1 eq{feedsource 0 get 2 ge {2}{1}ifelse
  72. 1 eq{feedsource 2 get dup 255 and}{feedsource 3 get dup 255 and}ifelse
  73.  0 eq{-8 bitshift 255 and feedpriority 0 2 index put pop
  74. currentpagedevice/InputAttributes get feedpriority 0 get 2 copy
  75. known{get null ne{4 dict begin/InputAttributes 1 dict dup/Priority feedpriority put def
  76. /PageSize currentpagedevice/InputAttributes get feedpriority 0 get get/PageSize get def
  77. /ManualFeed false def
  78. /Policies 1 dict dup/PageSize 1 put def currentdict end adjustpagedevice
  79. }if}{pop pop}ifelse}{pop 2 dict begin /ManualFeed true def/Policies 1 dict dup /PageSize 1 put def currentdict end adjustpagedevice
  80. }ifelse}if}if}bdf
  81. /mediasource{feedsource 0 0 put
  82. feedsource 1 4 index put
  83. feedsource 2 3 index isntr{dup 0 eq{pop 256}{dup 256 eq{pop 0}if}ifelse}if put
  84. feedsource 3 2 index isntr{dup 0 eq{pop 256}{dup 256 eq{pop 0}if}ifelse}if put
  85. pop pop pop}bdf
  86. /imageoptions{systemdict/setpagedevice known{0 3 index 0 ne{1 add}if
  87. 4 index 1 ne{1 add}if
  88. 5 index 1 ne{1 add}if
  89. dup 0 gt{dup 1 add dict begin/Policies exch dict def
  90. 2 index 0 eq{pop pop pop}{2 array astore exch pop
  91. /HWResolution exch def
  92. Policies/HWResolution 1 put}ifelse
  93. dup 1 ne{2 eq /PreRenderingEnhance exch def
  94. Policies/PreRenderingEnhance 1 put}{pop}ifelse
  95. dup 1 ne{2 eq/PostRenderingEnhance exch def
  96. Policies/PostRenderingEnhance 1 put}{pop}ifelse
  97. currentdict end setpagedevice}{pop pop pop pop pop pop}ifelse
  98. }{pop pop pop pop pop}ifelse}bdf
  99. /doop{vrb exch get exec}bdf
  100. /psu{/udf xdf/tso xdf /fNote xdf/fBitStretch xdf/scaleby96 xdf/yflip xdf/xflip xdf
  101. /invertflag xdf/dbinvertflag invertflag statusdict begin version cvr 47.0 ge product (LaserWriter) eq not and end invertflag and {not}if def
  102. xflip yflip or{/noflips false def}if
  103. /pgs xdf 2 index .72 mul exch div/pys xdf div .72 mul/pxs xdf ppr astore pop pgr astore pop/por xdf sn and/so xdf}bdf
  104. /tab{userdict /11x17 known{userdict begin /11x17 load exec end}{statusdict /setpage known{statusdict begin 792 1224 1 setpage end}{statusdict /setpageparams known{statusdict begin 792 1224 0 1 setpageparams end}if}ifelse}ifelse}bdf
  105. /a3Size{userdict /a3 known{userdict begin /a3 load exec end}{statusdict /setpageparams known{statusdict begin 842 1191 0 1 setpageparams end}if}ifelse}bdf
  106. /txpose{fNote{smalls}{bigs}ifelse pgs get exec pxs pys scale ppr aload pop por{noflips{pop exch neg exch translate pop 1 -1 scale}if
  107. xflip yflip and{pop exch neg exch translate 180 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg translate}if 
  108. xflip yflip not and{pop exch neg exch translate pop 180 rotate ppr 3 get ppr 1 get neg sub neg 0 translate}if yflip xflip not and{ppr 1 get neg ppr 0 get neg translate}if}
  109. {noflips{translate pop pop 270 rotate 1 -1 scale}if xflip yflip and{translate pop pop 90 rotate 1 -1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg translate}if
  110. xflip yflip not and{translate pop pop 90 rotate ppr 3 get ppr 1 get neg sub neg 0 translate}if yflip xflip not and{translate pop pop 270 rotate ppr 2 get ppr 0 get neg sub neg 0 exch translate}if}ifelse
  111. statusdict begin/waittimeout where{pop waittimeout 300 lt{statusdict/waittimeout 300 put}if}if end 
  112. scaleby96{ppr aload pop 4 -1 roll add 2 div 3 1 roll add 2 div 2 copy translate .96 dup scale neg exch neg exch translate}if}bdf
  113. /fr{4 copy pgr aload pop 3 -1 roll add 3 1 roll exch add 6 2 roll 3 -1 roll
  114. sub 3 1 roll exch sub 3 -1 roll exch div 3 1 roll div exch scale pop pop xl}bdf
  115. /obl{{0.212557 mul}{pop 0}ifelse}bdf
  116. /sfd{ps fg 5 -1 roll get mul 100 div 0 ps 5 -1 roll obl ps neg 0 0 6a astore makefont setfont}bdf
  117. /fnt{findfont sfd}bdf
  118. /bt{sa 3 1 roll 3 index and put}bdf
  119. /sa(\000\000\000\000\000\000\000\000\000\000)def
  120. /fs{0 1 bt 1 2 bt 2 4 bt 3 8 bt 4 16 bt 5 32 bt 6 64 bt 7 128 bt sa exch 8 exch put}bdf
  121. /mx1 matrix def
  122. /mx2 matrix def
  123. /mx3 matrix def
  124. /bu{currentpoint 4colors{currentcmykcolor}{currentrgbcolor}ifelse currentlinewidth currentlinecap currentlinejoin 
  125. currentdash exch aload length fg 5 sfl{1}{0}ifelse put pnsv pnsh 
  126. 2t aload pop 3a aload pop mx2 aload pop mx1 aload pop mtx currentmatrix aload pop
  127. mx3 aload pop ps pm restore/ps xdf mx3 astore pop}bdf
  128. /bn{/pm save def mx3 setmatrix newpath 0 0 moveto ct dup 39 get 0 exch getinterval cvx exec mtx astore setmatrix mx1 astore pop mx2 astore pop 3a 
  129. astore pop 2t astore pop/pnsh xdf/pnsv xdf gw
  130. /sfl fg 5 get 0 ne def array astore exch setdash setlinejoin setlinecap 
  131. setlinewidth 4colors{mysetcmykcolor}{setrgbcolor}ifelse moveto}bdf
  132. /fc{save vmstatus exch sub 50000 lt
  133. {(%%[|0|]%%)=print flush}if pop restore}bdf
  134. /tc{32768 div add 3 1 roll 32768 div add 2t astore pop}bdf
  135. /3a [0 0 0] def
  136. /2t 2 array def
  137. /tp{3a astore pop}bdf
  138. /tt{mx2 currentmatrix pop currentpoint 2 copy 2t aload pop qa 2 copy translate 3a aload pop exch dup 0 eq
  139. {pop}{1 eq{-1 1}{1 -1}ifelse scale}ifelse rotate pop neg exch neg exch translate moveto}bdf
  140. /te{mx2 setmatrix}bdf
  141. /th{3 -1 roll div 3 1 roll exch div 2 copy mx1 scale pop scale/sfl true def}bdf
  142. /tu{1 1 mx1 itransform scale/sfl false def}bdf
  143. /ts{1 1 mx1 transform scale/sfl true def}bdf
  144. /fz{/ps xdf}bdf
  145. /dv{dup 0 ne{div}{pop}ifelse}bdf
  146. /pop4{pop pop pop pop}bdf
  147. /it{sfl{mx1 itransform}if}bdf
  148. /gm{exch it moveto}bdf/rm{it rmoveto}bdf
  149. /lm{currentpoint sfl{mx1 transform}if exch pop sub 0 exch it rmoveto}bdf
  150. /fm{statusdict/manualfeed known}bdf
  151. /se{statusdict exch/manualfeed exch put}bdf
  152. /mf{dup/ma exch def 0 gt{fm se/t1 5 st ok ma 1 gt and{/t2 0 st/t3 0 st
  153. statusdict/manualfeedtimeout 3600 put
  154. }if}if}bdf
  155. /jn{/statusdict where exch pop{statusdict exch /jobname exch put}if}bdf
  156. /pen{pnm mul/pnsh xdf pnm mul/pnsv xdf pnsh setlinewidth}bdf
  157. /min{2 copy gt{exch}if pop}bdf
  158. /max{2 copy lt{exch}if pop}bdf
  159. /dh{fg 6 1 put array astore dup {1 pxs div mul exch}forall astore exch pop exch pop exch setdash}bdf
  160. /ih[currentdash]def
  161. /rh{fg 6 0 put ih aload pop setdash}bdf
  162. /dl{gsave nlw pys div setlinewidth 0 setgray}bdf
  163. /dlin{exch currentpoint currentlinewidth 2 div dup
  164. translate newpath moveto lineto currentpoint stroke grestore moveto}bdf
  165. /lin{fg 6 get 0 ne{exch lineto currentpoint 0 doop moveto}
  166. {exch currentpoint/pnlv xdf/pnlh xdf gsave newpath/@1 xdf/@2 xdf fp{pnlh @2 lt{pnlv @1 ge
  167. {pnlh pnlv moveto @2 @1 lineto pnsh 0 rlineto
  168. 0 pnsv rlineto pnlh pnsh add pnlv pnsv add lineto pnsh neg 0 rlineto}
  169. {pnlh pnlv moveto pnsh 0 rlineto @2 pnsh add @1 lineto 0 pnsv rlineto
  170. pnsh neg 0 rlineto pnlh pnlv pnsv add lineto}ifelse}{pnlv @1 gt
  171. {@2 @1 moveto pnsh 0 rlineto pnlh pnsh add pnlv lineto 0 pnsv rlineto
  172. pnsh neg 0 rlineto @2 @1 pnsv add lineto}{pnlh pnlv moveto pnsh 0 rlineto
  173. 0 pnsv rlineto @2 pnsh add @1 pnsv add lineto pnsh neg 0 rlineto
  174. 0 pnsv neg rlineto}ifelse}ifelse
  175. closepath fill}if @2 @1 grestore moveto}ifelse}bdf
  176. /gw{/pnm fg 3 get fg 4 get div def}bdf
  177. /lw{fg exch 4 exch put fg exch 3 exch put gw pnsv pnsh pen}bdf
  178. /barc{/@1 xdf/@2 xdf/@3 xdf/@4 xdf/@5 xdf
  179. /@6 xdf/@7 xdf/@8 xdf gsave
  180. @5 @7 add 2 div @6 @8 add 2 div translate newpath 0 0 moveto
  181. @5 @7 sub @6 @8 sub mtx currentmatrix pop scale @1{newpath}if
  182. 0 0 0.5 @4 @3 arc @4 @3 sub abs 360 ge{closepath}if
  183. mtx setmatrix @2 doop grestore}bdf
  184. /ar{dup 0 eq barc}bdf
  185. /ov{0 exch 360 exch true barc}bdf
  186. /rc{dup/@t xdf 0 eq{4 copy 3 -1 roll eq 3 1 roll eq and{pnsv 2 div sub exch pnsh 2 div sub exch 4 2 roll pnsv 2 div add exch pnsh 2 div add exch
  187. /@t 1 def}if}if currentpoint 6 2 roll newpath 4 copy 4 2 roll exch moveto 6 -1 roll lineto lineto lineto closepath @t doop moveto}bdf
  188. /mup{dup pnsh 2 div le exch pnsv 2 div le or}bdf
  189. /rr{/@1 xdf 2. div/@2 xdf 2. div/@3 xdf
  190. /@4 xdf/@5 xdf/@6 xdf/@7 xdf
  191. @7 @5 eq @6 @4 eq @2 mup or or{@7 @6 @5 @4 @1 rc}
  192. {@4 @6 sub 2. div dup @2 lt{/@2 xdf}{pop}ifelse
  193. @5 @7 sub 2. div dup @2 lt{/@2 xdf}{pop}ifelse
  194. @1 0 eq{/@2 @2 pnsh 2 div 2 copy gt{sub def}{0 pop4}ifelse}if
  195. currentpoint newpath
  196. @4 @6 add 2. div @7 moveto
  197. @4 @7 @4 @5 @2 arcto pop4
  198. @4 @5 @6 @5 @2 arcto pop4
  199. @6 @5 @6 @7 @2 arcto pop4
  200. @6 @7 @4 @7 @2 arcto pop4
  201. closepath @1 doop moveto}ifelse}bdf
  202. /pr{gsave newpath/pl{exch moveto/pl{exch lineto}def}def}bdf
  203. /pl{exch lineto}bdf
  204. /ep{dup 0 eq{{moveto}{exch lin}{}{(%%[|1|]%%)= flush}pathforall
  205. pop grestore}{doop grestore}ifelse currentpoint newpath moveto}bdf
  206. /gr{64. div setgray}bdf
  207. /savescreen{ns not{/ns true def systemdict/currentcolorscreen known{currentcolorscreen/pkspf xdf/pkrot xdf/pkfreq xdf/pyspf xdf/pyrot xdf/pyfreq xdf/pmspf xdf/pmrot xdf/pmfreq xdf
  208. /pcspf xdf/pcrot xdf/pcfreq xdf}{currentscreen/sspf xdf/srot xdf/sfreq xdf}ifelse}if}bdf
  209. /restorescreen{/ns false def systemdict/setcolorscreen known{pcfreq pcrot/pcspf load pmfreq pmrot/pmspf load pyfreq pyrot/pyspf load
  210. pkfreq pkrot/pkspf load setcolorscreen}{sfreq srot/sspf load setscreen}ifelse}bdf
  211. /pat{savescreen sa8 
  212. copy pop 9.375 pa por not{90 add}if{1 add 4 mul cvi sa8 exch get exch 1 add 4 mul cvi 7 sub bitshift 1 and}setscreen exch not{gr}{pop}ifelse}bdf
  213. /sg{restorescreen gr}bdf
  214. /cpat{savescreen 10 2 roll 7 -1 roll sa8 copy pop 9.375 pa por not{90 add}if{1 add 4 mul cvi sa8 exch get exch 1 add 4 mul cvi 7 sub bitshift 1 and}8 -1 roll sb8 copy pop 9.375 pa por not{90 add}if{1 add 4 mul cvi sb8
  215. exch get exch 1 add 4 mul cvi 7 sub bitshift 1 and}9 -1 roll sc8 copy pop 9.375 pa por not{90 add}if{1 add 4 mul cvi sc8 exch get exch 1 add 4 mul cvi 7 sub bitshift 1 and}10 -1 roll sd8 copy pop 9.375 pa por not{90 add}if{1 add 4 mul cvi sd8
  216. exch get exch 1 add 4 mul cvi 7 sub bitshift 1 and}psuedo1 dsc 4{4 -1 roll 1 exch 64 div sub}repeat mysetcmykcolor pop pop}bdf
  217. systemdict/setcolorscreen known statusdict/processcolors known and{/psuedo1 lnop bdf/dsc/setcolorscreen load def}{/psuedo1{16{pop}repeat sa8 copy pop 9.375 pa por not{90 add}if{1 add 4 mul cvi sa8 exch get exch 1 add 4 mul cvi 7 sub bitshift 1 and}}bdf
  218. /bwsc{setscreen dup gr 0 exch 0 exch 64 exch 64 exch 64 exch}bdf/dsc/bwsc load def
  219. }ifelse
  220. systemdict/setcmykcolor known{/mysetcmykcolor /setcmykcolor load def}{/mysetcmykcolor{1 sub 4 1 roll 3{3 index add neg dup 0 lt{pop 0}if 3 1 roll}repeat setrgbcolor pop}bdf}ifelse
  221. /dc{transform round .5 sub exch round .5 sub exch itransform}bdf
  222. /sn{userdict/smooth4 known}bdf
  223. /x8{3 bitshift}bdf
  224. /x4{2 bitshift}bdf
  225. /d4{-2 bitshift}bdf
  226. /d8{-3 bitshift}bdf
  227. /rb{15 add -4 bitshift 1 bitshift}bdf
  228. /db{/@7 save def/@1 xdf/@2 xdf/@3 xdf/@4 xdf/@5 xdf/@6 @5 @3 4 add mul def
  229. dc translate scale/xdbit 1 1 idtransform abs/ydbit exch def abs def{0 0 1 ydbit add 1 10 rc clip}if
  230. @1 0 eq @1 4 eq or{currentrgbcolor 1 setgray ydbit 0 1 ydbit add 1 2 rc setrgbcolor}if
  231. @1 3 eq @1 7 eq or{1 setgray}{currentrgbcolor 2 index eq exch 2 index eq and exch pop{0 setgray}if}ifelse/@9 @1 0 eq @1 1 eq @1 3 eq or or dbinvertflag xor def/@13 @6 def
  232. @2 fBitStretch or{/@10 @4 x4 def/@11 @3 x4 def/@12 @10 rb def/@13 @12 @11 mul def/@15 1 1 dtransform abs/calcY 1 index def round cvi/@14 exch def
  233. abs/calcX 1 index def round cvi scaleby96 not{1 add}if def/@16 @15 rb def/@17 @16 @14 mul def}if
  234. sn @13 60000 lt and @2 fBitStretch or and{mtx currentmatrix dup 1 get exch 2 get 0. eq exch 0. eq and @17 60000 lt and fBitStretch and{@16 3 bitshift @14 @9 [calcX 0 0 calcY 0 0]{@17 string @13 string
  235. currentfile @6 string readhexstring pop 1 index @4 @3 @5 @12 @2 smooth4
  236. @10 @11 @12 dup string 5 index @15 @14 @16 dup string stretch}imagemask}{@12 x8 @11 @9 [@10 0 0 @11 0 0]{@13 string
  237. currentfile @6 string readhexstring pop 1 index @4 @3 @5 @12 @2 smooth4}imagemask}ifelse}{@5 3 bitshift @3 4 add @9 [@4 0 0 @3 0 2]{currentfile @6 string readhexstring pop}imagemask}ifelse
  238. @7 restore}bdf
  239. systemdict/setcmykcolor known{/psuedo lnop bdf/di/colorimage load def}{/routines[{.3 mul add 1}bind{.59 mul add 2}bind{.11 mul add round cvi str exch i exch put/i i 1 add def 0 0}bind]def
  240. /psuedo{/i 0 def 0 exch 0 exch{exch routines exch get exec}forall pop pop str}bdf/bwi{pop pop image}bdf/di/bwi load def}ifelse
  241. /cdb{/@7 save def/@1 xdf/@2 xdf/@3 xdf/@4 xdf/@5 xdf
  242. systemdict/setcmykcolor known not{dc}if translate scale /@6 xdf
  243. /@18 @5 dup 60000 ge{pop 60000}if string def @6 not{/str @18 0 @18 length 3 idiv getinterval def}if @4 @3 8 [@4 0 0 @3 0 0]@6{{currentfile @18 readhexstring pop}image}{{currentfile @18 readhexstring pop psuedo}false 3 di}ifelse @7 restore}bdf
  244. /wd 16 dict def
  245. /mfont 14 dict def
  246. /mdf{mfont wcheck not{/mfont 14 dict def}if mfont begin xdf end}bdf
  247. /cf{{1 index/FID ne{def}{pop pop}ifelse}forall}bdf/rf{/@1 exch def/@2 exch def
  248. FontDirectory @2 known{cleartomark pop}{findfont dup begin dup length @1 add dict begin
  249. cf{/Encoding macvec def}{Encoding dup length array copy/Encoding exch def
  250. counttomark 2 idiv{Encoding 3 1 roll put}repeat}ifelse
  251. pop
  252. exec currentdict end end @2 exch definefont pop}ifelse}bdf
  253. /bmbc{exch begin wd begin
  254. /cr xdf
  255. save
  256. CharTable cr 6 mul 6 getinterval{}forall
  257. /bitheight xdf/bitwidth xdf
  258. .96 div/width xdf
  259. Gkernmax add/XOffset xdf Gdescent add/YOffset xdf/rowbytes xdf
  260. rowbytes 255 eq{0 0 0 0 0 0 setcachedevice}
  261. {Gnormsize dup scale
  262. width 0 XOffset YOffset bitwidth XOffset add bitheight YOffset add
  263. setcachedevice
  264. rowbytes 0 ne{
  265. XOffset YOffset translate newpath 0 0 moveto
  266. bitwidth bitheight scale
  267. sn{
  268. /xSmt bitwidth x4 def
  269. /ySmt bitheight x4 def
  270. /rSmt xSmt rb def
  271. rSmt x8 ySmt true
  272. [xSmt 0 0 ySmt neg 0 ySmt]
  273. {rSmt ySmt mul string CharData cr get
  274. 1 index bitwidth bitheight rowbytes rSmt tso smooth4}
  275. }{rowbytes 3 bitshift bitheight 4 add true
  276. [bitwidth 0 0 bitheight neg 0 bitheight 2 add]
  277. {CharData cr get}
  278. }ifelse
  279. imagemask
  280. }if
  281. }ifelse
  282. restore
  283. end end
  284. }bdf
  285. /bb{.96 exch div/Gnormsize mdf 2 index
  286. /Gkernmax mdf 1 index/Gdescent mdf
  287. 3 index div 4 1 roll
  288. 2 index div 1. 5 2 roll
  289. exch div 4 1 roll
  290. 4 array astore/FontBBox mdf
  291. }bdf
  292. /cdf{mfont/CharData get 3 1 roll put}bdf
  293. /bf{
  294. mfont begin
  295. /FontType 3 def
  296. /FontMatrix [1 0 0 1 0 0] def
  297. /Encoding macvec def
  298. /MFontType 0 def
  299. /BuildChar/bmbc load def
  300. end
  301. mfont definefont pop
  302. }bdf
  303. /wi LW 1 eq{{gsave 0 0 0 0 0 0 0 0 moveto lineto lineto lineto closepath clip stringwidth grestore}bind}{/stringwidth load}ifelse def
  304. /aps{0 get 124 eq}bdf
  305. /xc{s75 cvs dup}bdf
  306. /xp{put cvn}bdf
  307. /scs{xc 3 67 put dup 0 95 xp}bdf
  308. /sos{xc 3 79 xp}bdf
  309. /sbs{xc 1 66 xp}bdf
  310. /sis{xc 2 73 xp}bdf
  311. /sob{xc 2 79 xp}bdf
  312. /sss{xc 4 83 xp}bdf
  313. /dd{exch 1 index add 3 1 roll add exch}bdf
  314. /smc{moveto dup show}bdf
  315. /ndf2{udf{dup /FontType get 0 eq{/FDepVector get{dup /FontType get 0 eq{ndf2}{dup /df2 known{begin df2 0 null put end
  316. }{pop}ifelse}ifelse}forall}{/df2 known{dup begin df2 0 null put end}if}ifelse}{pop}ifelse}bdf
  317. /kwn{FontDirectory 1 index known{findfont dup ndf2 exch pop}}bdf
  318. /gl{1 currentgray sub setgray}bdf
  319. /newmm{dup /FontType get 0 eq{dup maxlength dict begin{1 index/FID ne 2 index/UniqueID ne and{def}{pop pop}ifelse}forall currentdict end
  320. dup /FDepVector 2 copy get[exch 6 index exch 6 index exch{newmm 3 1 roll}forall pop pop] put dup
  321. }{/mfont 10 dict def mfont begin/FontMatrix [1 0 0 1 0 0] def
  322. /FontType 3 def/Encoding macvec def/df 1 index def/df2 1 array def/FontBBox [0 0 1 1] def/StyleCode 2 index def
  323. /mbc{bcarray StyleCode get}def/BuildChar{exch begin    wd begin/cr exch def/cs s1 dup 0 cr put def df /MFontType known not{
  324. df2 0 get null eq{df dup length 2 add dict begin{1 index/FID ne 2 index/UniqueID ne and{def}{pop pop}ifelse}forall
  325. /StrokeWidth 1 0 FontMatrix idtransform pop dup nlw mul pys div ps div exch 0.012 mul 2 copy le{exch}if pop def/PaintType 2 def currentdict end
  326. /q exch definefont df2 exch 0 exch put}if}if mbc exec end end}def end mfont}ifelse
  327. 3 index exch definefont exch pop}bdf
  328. /mb{dup sbs kwn{0 2 index findfont newmm exch pop exch pop exch pop}ifelse sfd}bdf
  329. /mo{dup sos kwn{2 2 index findfont newmm exch pop exch pop exch pop}ifelse sfd}bdf
  330. /ms{dup sss kwn{4 2 index findfont newmm exch pop exch pop exch pop}ifelse sfd}bdf
  331. /ou{dup sos kwn{mfont/df2 known{mfont begin df2 0 null put end}if 3 2 index findfont newmm exch pop exch pop exch pop}ifelse sfd}bdf
  332. /su{dup sss kwn{mfont/df2 known{mfont begin df2 0 null put end}if 5 2 index findfont newmm exch pop exch pop exch pop}ifelse sfd}bdf
  333. /ao{/fmv true def ou}bdf/as{/fmv true def su}bdf
  334. /vo{/fmv false def ou}bdf/vs{/fmv false def su}bdf
  335. /c{currentrgbcolor dup 4 1 roll eq 3 1 roll eq and/gray xdf}bdf
  336. /bcarray[{/da .03 def df setfont gsave cs wi 1 index 0 ne{exch da add exch}if grestore setcharwidth
  337. cs 0 0 smc da 0 smc da da smc 0 da moveto show}bind dup{/da 1 ps div def df setfont gsave cs wi 1 index 0 ne{exch da add exch}if grestore setcharwidth
  338. cs 0 0 smc da 0 smc da da smc 0 da smc c gray{gl}{1 setgray}ifelse da 2. div dup moveto show}bind
  339. {df setfont gsave cs wi grestore setcharwidth c gray{gl}{currentrgbcolor 1 setgray}ifelse cs 0 0 smc df2 0 get setfont
  340. gray{gl}{4 1 roll setrgbcolor}ifelse 0 0 moveto show}bind
  341. {/da 1 ps div def/ds .05 def/da2 da 2. div def df setfont gsave cs wi 1 index 0 ne{exch ds add da2 add exch}if grestore setcharwidth
  342. cs ds da2 add .01 add 0 smc 0 ds da2 sub translate 0 0 smc da 0 smc da da smc 0 da smc c gray{gl}{1 setgray}ifelse da 2. div dup moveto show}bind
  343. {/da .05 def df setfont gsave cs wi 1 index 0 ne{exch da add exch}if grestore setcharwidth c cs da .01 add 0 smc 0 da translate
  344. gray{gl}{currentrgbcolor 1 setgray 4 -1 roll}ifelse 0 0 smc gray{gl}{4 1 roll setrgbcolor}ifelse df2 0 get setfont 0 0 moveto show}bind]def
  345. /st{1000 mul usertime add dup 2147483647 gt{2147483647 sub}if def}bdf
  346. /the{usertime sub dup 0 lt exch -2147483648 gt and}bdf
  347. /6a 6 array def
  348. /2a 2 array def
  349. /3q 3 array def
  350. /qs{3 -1 roll sub exch 3 -1 roll sub exch}bdf
  351. /qa{3 -1 roll add exch 3 -1 roll add exch}bdf
  352. /qm{3 -1 roll 1 index mul 3 1 roll mul}bdf
  353. /qn{6a exch get mul}bdf
  354. /qA .166667 def/qB .833333 def/qC .5 def
  355. /qx{6a astore pop
  356. qA 0 qn qB 2 qn add   qA 1 qn qB 3 qn add
  357. qB 2 qn qA 4 qn add   qB 3 qn qA 5 qn add
  358. qC 2 qn qC 4 qn add   qC 3 qn qC 5 qn add}bdf
  359. /qp{6 copy 12 -2 roll pop pop}bdf
  360. /qc{exch qp qx curveto}bdf
  361. /qi{{exch 4 copy 2a astore aload pop qa .5 qm newpath moveto}{exch 2 copy 6 -2 roll 2 qm qs 4 2 roll}ifelse}bdf
  362. /qq{{qc 2a aload pop qx curveto}{exch 4 copy qs qa qx curveto}ifelse}bdf
  363. /pt{currentpoint newpath moveto}bdf
  364. /qf{/fillflag true def}bdf
  365. /ec{dup 4 and 0 ne{closepath}if 1 and 0 ne{0 doop}if grestore currentpoint newpath moveto/fillflag false def}bdf
  366. /eu{currentpoint fp{0 ep}{grestore newpath}ifelse moveto/fillflag false def}bdf
  367. /bp{currentpoint newpath 2 copy moveto}bdf
  368. /ef{gsave fillflag{gsave eofill grestore}if}bdf
  369. /sm{0 exch{@1 eq{1 add}if}forall}bdf
  370. /lshow{4 1 roll exch/@1 exch def{1 index wi pop sub 1 index sm dv 0 @1 4 -1 roll widthshow}{1 index wi pop sub
  371. 1 index dup sm 10 mul exch length 1 sub add dv dup 10. mul 0 @1 4 -1 roll 0 6 -1 roll awidthshow}ifelse}bdf
  372. /setTxMode{sa 9 2 index put exch not{3 eq{1}{0}ifelse setgray}{pop}ifelse}bdf
  373. /SwToSym{{}mark false/Symbol/|______Symbol 0 rf 0 sa 6 get 0 ne{pop 1}{sa 7 get 0 eq{pop 2}if}ifelse
  374. sa 1 get 0 ne/|______Symbol
  375. sa 4 get 0 ne{vs}{sa 3 get 0 ne{vo}{fnt}ifelse}ifelse}bdf
  376. /mc{0 3 1 roll transform neg exch pop}bdf
  377. /ul{dup 0 ne sa 2 get 0 ne and{gsave 0 0
  378. /UnderlinePosition kif{mc}{ps -10 div}ifelse/UnderlineThickness kif{mc}{ps 15 div}ifelse
  379. abs setlinewidth neg rmoveto
  380. sa 4 get 0 ne{gsave currentlinewidth 2. div dup rmoveto currentpoint newpath moveto
  381. 2 copy rlineto stroke grestore}if
  382. sa 3 get sa 4 get or 0 ne{gsave currentrgbcolor dup 4 1 roll eq 3 1 roll eq and{gl}{1 setgray}ifelse 2 copy rlineto stroke grestore rlineto strokepath nlw pys div setlinewidth}{rlineto}ifelse
  383. stroke grestore}{pop}ifelse}bdf
  384. /sgt{2 copy known{get true}{pop pop false}ifelse}bdf
  385. /kif{currentfont dup/FontMatrix get exch/FontInfo sgt{true}{currentfont/df sgt
  386. {dup/FontInfo sgt{3 1 roll/FontMatrix get mtx concatmatrix exch true}{pop pop pop false}
  387. ifelse}{pop pop false}ifelse}ifelse{3 -1 roll sgt{exch true}{pop false}ifelse}{false}ifelse}bdf
  388. /blank/Times-Roman findfont/CharStrings get/space get def
  389. /macvec 256 array def
  390. /NUL/SOH/STX/ETX/EOT/ENQ/ACK/BEL/BS/HT/LF/VT/FF/CR/SO/SI
  391. /DLE/DC1/DC2/DC3/DC4/NAK/SYN/ETB/CAN/EM/SUB/ESC/FS/GS/RS/US
  392. macvec 0 32 getinterval astore pop
  393. macvec 32/Times-Roman findfont/Encoding get
  394. 32 96 getinterval putinterval macvec dup 39/quotesingle put 96/grave put
  395. /Adieresis/Aring/Ccedilla/Eacute/Ntilde/Odieresis/Udieresis/aacute
  396. /agrave/acircumflex/adieresis/atilde/aring/ccedilla/eacute/egrave
  397. /ecircumflex/edieresis/iacute/igrave/icircumflex/idieresis/ntilde/oacute
  398. /ograve/ocircumflex/odieresis/otilde/uacute/ugrave/ucircumflex/udieresis
  399. /dagger/degree/cent/sterling/section/bullet/paragraph/germandbls
  400. /registered/copyright/trademark/acute/dieresis/notequal/AE/Oslash
  401. /infinity/plusminus/lessequal/greaterequal/yen/mu/partialdiff/summation
  402. /product/pi/integral/ordfeminine/ordmasculine/Omega/ae/oslash
  403. /questiondown/exclamdown/logicalnot/radical/florin/approxequal/Delta/guillemotleft
  404. /guillemotright/ellipsis/blank/Agrave/Atilde/Otilde/OE/oe
  405. /endash/emdash/quotedblleft/quotedblright/quoteleft/quoteright/divide/lozenge
  406. /ydieresis/Ydieresis/fraction/currency/guilsinglleft/guilsinglright/fi/fl
  407. /daggerdbl/periodcentered/quotesinglbase/quotedblbase/perthousand/Acircumflex/Ecircumflex/Aacute
  408. /Edieresis/Egrave/Iacute/Icircumflex/Idieresis/Igrave/Oacute/Ocircumflex
  409. /apple/Ograve/Uacute/Ucircumflex/Ugrave/dotlessi/circumflex/tilde
  410. /macron/breve/dotaccent/ring/cedilla/hungarumlaut/ogonek/caron
  411. macvec 128 128 getinterval astore pop
  412. {}mark true/Courier/|______Courier 0 rf
  413. {/Metrics 21 dict begin/zero 600 def/one 600 def/two 600 def/three 600 def/four 600 def/five 600 def/six 600 def/seven 600 def/eight 600 def
  414. /nine 600 def/comma 600 def/period 600 def/dollar 600 def/numbersign 600 def/percent 600 def/plus 600 def/hyphen 600 def/E 600 def/parenleft 600 def/parenright 600 def/space 600 def
  415. currentdict end def currentdict/UniqueID known{/UniqueID 16#800000 def}if/FontBBox FontBBox 4 array astore def}mark true/Helvetica/|______Seattle 1 rf
  416. /oldsettransfer/settransfer load def
  417. /concatprocs{/proc2 exch cvlit def/proc1 exch cvlit def/newproc proc1 length proc2 length add array def
  418. newproc 0 proc1 putinterval newproc proc1 length proc2 putinterval newproc cvx}def
  419. /settransfer{currenttransfer concatprocs oldsettransfer}def
  420. /PaintBlack{{1 exch sub}settransfer gsave newpath clippath 1 setgray fill grestore}def
  421. /od{(Rvd\001\001\000\000\177) fg copy pop txpose
  422. 1 0 mtx defaultmatrix dtransform exch atan/pa exch def
  423. newpath clippath mark
  424. {transform{itransform moveto}}{transform{itransform lineto}}
  425. {6 -2 roll transform 6 -2 roll transform 6 -2 roll transform
  426. {itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll curveto}}
  427. {{closepath}}pathforall newpath counttomark array astore/gc xdf pop ct 39 0 put
  428. 10 fz 0 fs 2 F/|______Courier fnt invertflag{PaintBlack}if
  429. statusdict/processcolors known{statusdict begin processcolors end 4 eq{/4colors true def}if}if}bdf
  430. /cd{}bdf
  431. /op{feedsource 0 get 0 eq{setmultipurposepagesize
  432. feedsource 0 1 put
  433. selectmediasource}{feedsource 0 get 1 eq{feedsource 0 2 put
  434. selectmediasource}if
  435. }ifelse
  436. /sfl false def systemdict/currentcolorscreen known{dcfreq dcrot/dcspf load dmfreq dmrot/dmspf load dyfreq dyrot/dyspf load
  437. dkfreq dkrot/dkspf load setcolorscreen}{freq rot/spf load setscreen}ifelse
  438. savescreen
  439. /ns false def/pm save def}bdf
  440. /cp{not{userdict/#copies 0 put}if ma 0 gt{{t1 the{exit}if}loop}if{/copypage load exec}{/showpage load exec}ifelse pm restore}bdf
  441. /px{0 3 1 roll tp tt}bdf
  442. /psb{/us save def}bdf
  443. /pse{us restore}bdf
  444. /ct 40 string def
  445. /nc{currentpoint initclip newpath gc{dup type dup/arraytype eq exch/packedarraytype eq or{exec}if}
  446. forall clip newpath moveto}def
  447. /kp{ct 0 2 index length 2 index 39 2 index put getinterval copy cvx exec mx3 currentmatrix pop}bdf
  448. end
  449. LW 1 eq userdict/a4small known not and{/a4small
  450. [[300 72 div 0 0 -300 72 div -120 3381]
  451. 280 3255
  452. {statusdict/jobstate (printing) put 0 setblink
  453. margins
  454. exch 196 add exch 304 add 8 div round cvi frametoroket
  455. statusdict/jobstate (busy) put
  456. 1 setblink}
  457. /framedevice load
  458. 60 45{dup mul exch dup mul add 1.0 exch sub}/setscreen load
  459. {}/settransfer load/initgraphics load/erasepage load]cvx
  460. statusdict begin bind end readonly def}if
  461. md begin/bigs[lnop userdict/letter known{/letter load}{lnop}ifelse userdict/legal known{/legal load}{lnop}ifelse userdict/a4 known{/a4 load}{lnop}ifelse userdict/b5 known{/b5 load}{lnop}ifelse 
  462. lnop lnop lnop /tab load/a3Size load]def
  463. /smalls[lnop userdict/lettersmall known{/lettersmall load}{userdict/note known{/note load}{lnop}ifelse}ifelse
  464. userdict/legal known{/legal load}{lnop}ifelse userdict/a4small known{/a4small load}{lnop}ifelse 
  465. userdict/b5 known{/b5 load}{userdict/note known{/note load}{lnop}ifelse}ifelse lnop lnop lnop /tab load/a3Size load]def end
  466. systemdict/currentpacking known{setpacking}if
  467. {currentfile eexec} ( %endeexec) ok userdict/stretch known not and checkload
  468. 373A767D4B7FD94FE5903B7014B1B8D3BED02632C855D56F458B118ACF3AF73FC4EF5E81F5749042B5F9CF1016D093B75F250B7D8280B2EACE05A37037F7BDF6E12226D7D4E2DF2C52FAFD5FD40FE72A0D3AC4BD485D8369D4C87636E920D1DAF222D92155A9CB1667E715F0B82799B37CC8F5B32B74B39CF494536DC39C7EF04A7BCB29E2CEC79073CADCCFB23B4AA1363F876F5121B618071B7B4EB1E5DE75FAA2368A3E5DB2B198623AFE92AE9484270FE7F57A850E88C0D3EEA156611C91D8E480D4370B025CCA6929A2BF40AD3D01B2CB7EE6DFB46E12A830542337F7819B67F9765210F76DB06F34DA5B13A11759305C582E16D2B854939F6D9121F2A4F285282F5DCD3D15896D121E3D6F5BE79E087451BB0ED233CDBEF090D3B4AC2DC34B97E70C61D95FB072B8C12D2ABD843520949A39DCF99E2C1AA8FBCD025E47E0A82A8D96E75BAF40F52AD402495BBD4DE0F356C8B14E764874E639C9F045A0D1908EC6456EB6C5B8A6F826192F767EF2C55A21C58F5F9CC1F59247B55F2387828C7FE89D5E7D8484D1BC86CB6673BDBE4FE17DD9BDE95224FE645136F41330BF155A4DDE1B0A32233BF471CE58FBC660DC7E641B0A0D30018454E2191C414A3011FF3FED1C0D88FE1FF9F75DCC456D097947226FBEC92509146D3A4CFFC0471B31C53222ED9DD88566F60F6C0D705AD79DACF53B070026F083ED28B5CF757AAA0A169F6F320A75E9D2ED50ABD939AF85B6346C2ADB25D168F10508E1516D194C635E6B187FADEA0829DBF0390C0F003F0265E215BC96CA3CC13D4A8E01570BE193CA75A620728CD275ACF1986EFFB3A13419FE55EA7C4467B7E7EEDC1FC29C9F8C46A557D2CCDB914EF7B93E7530D555DFC2398AFC68CAD991F062EF85BAA1884EC166C7C5DF8543666D8C41BE267D706BD1588F1F662F705CAE4D29DC38EF66BFAA89470D8A099B6F1B4587F7B024412276106FCD3EB5AE17A5D1DF1781992DC40EA0A992F706F701304CEA9D9073E7A74F1E687D81C3E5841D31CF86855BAAAD9B5D30317C75150A857C6B114735315CDD1AEF36C26BBB0645499406DEE2F24B3B1C72FEC97C7BA31AA2CDAB25418BB1DC4C7E4757F1D625087B0FD0300C03A65F2A72CE734925735277E034CDCF599129679F70CC8B66E03878851DB75041F275E1E5761F3EC753BE1359CA364A22047AE4886217F9259FE19FF5B116E8019B98B143114B313E8BEF87EC949D85C82E0812E6F50525E73890AF362CC8EE8A85F4197E6AC18638EF12E56A808D439AF1BFD363F140314BF4E534485C42F1856688CC35288E8D770120A420FB9F1FCF8AE8BD6D6156CC23E6C51119FE4DE1B68C9DF3487E9974BF9ED31F8D3CE93FF101867319F2FF492D5D398B4F09A66F2F55BCAB34B99173B7EE89039D00DD21A7B3A52E9F028F8301B5FC12D409412E064513BC579AAC498F577EA8ECD1FE3E42DC3CC320786C7B00194FEDF344402C33FC492D4BA86992B01683F440220FFE756BC88A94223D316078D69D33560E8EAB76B24CB7AA4320CF435593D76F624324ABE00B5587A4F283C725EA24567133F25F472B5E2E4474DDB5A16AC5F2DF32350395D3E3892FE361F4D5C9A610C654C9227614FBBAFF3356A90A2266E00F66234061075491571A65616211257F160000000000000000000000000000000000000000000000000000000000000000
  469. 0000000000000000000000000000000000000000000000000000000000000000
  470. 0000000000000000000000000000000000000000000000000000000000000000
  471. 0000000000000000000000000000000000000000000000000000000000000000
  472. 0000000000000000000000000000000000000000000000000000000000000000
  473. 0000000000000000000000000000000000000000000000000000000000000000
  474. 0000000000000000000000000000000000000000000000000000000000000000
  475. 0000000000000000000000000000000000000000000000000000000000000000
  476. cleartomark
  477.  %endeexec
  478.  
  479. {currentfile eexec} ( %endeexec) ok userdict/smooth4 known not and checkload
  480. F94E00EE41A71C59E5CAEED1EDBCF23D1DBA1EE99B9BB356492923BD8B1BA83A87CEB0E07377A31FD6241E814681118E17DC7CACE570399506E6E441B871B6043831BD03EFC11DBBD8001EE2FF8CFBD485065D455A2E15AC36F1A84AD8789FA6461199C7CD14CB9FD64D4B06452B7FC0A8FC263F70F1CCB893295D4DE70ADAB771C0F84396FA98C60B11DA02ABA157298DF0A23621853BEF167443A985ADC09BEFFD51CB4D29179E2B34609EF38A49DA61F4BFC256A3DE0732D7D29754A194857B9C9E9971227AA1DD0611FBB10E44E5FF66C062D9C24ED3290529330BC317825E876929582DB0E39B9FC5EFD20CC1D4F94920EB9C534D0DA90DE70D25BC7287319CF28602B3F46633C242CAFC8905E960317E3C2FA20AB8DB06ADBAF292FC7BA2CA14EE65DF28B99CC11666B70AD33E8E1D57D63D4B89ECC615AE5747C1CA752C833D8D6DE54CD4A0350B44310555CE3BD2C615ADD27B634CDB350AF3A432CE78AACD2909A5B586F666CD87919A36DB1CBE86B3CE281DFD01CD7E1B8A18A4B415CECBFF79A5C4390A15EA77D14D6BE12BAB5A8268C3F286D0590060647CABED674443CD258F11415E866AB330A251691B61F2422A61AFE59B6B4FBDCF85ED9BA0F8E483C034089E6877FF5923698D3A0DC0EED6B9CFD32DF0839BC4EA5F6D1FCB6DD0920391E57E84745131D02D100179F4E0A68EC0A5FF6680A6F463D038B04AF63FFA13D743B995A26A743C26D387209023C91DE43DF047A16F328AC9DDC08573B38BE9EA341EA16C78EC32F3A1B36B90D95A50610F4D050EC1C33497F3F3A81A1B4C8BEF0BA84EE2FAA32DC112DAC490AF53E1749C4A0D866CAF7B893E52383B0D38065C333FB122B700D7246F7EE87D942AE3DB5C1DD77E9E76C80CC5AD63D28DFED0E229CE604673F78CD47F258FDF5BF3A3EAEC5C9BC8E482D8DBA9D268A35DA8C095A690679ED2123E8B8F5E4826FA3B199EAA5D482D4B6AA86572E387CECEB7149C8947F41D6339328A748A17F8C4AD3B0555F1E409450BA0C564F1F488BB5096EB003568D4D5EF6489897E27409547D0EE4487D30184793B0F27BD265A64BDB3EA6761569DA955620C612E718677B77D6D81B999C6298877AFE0D1D6F6F358377A8BD2402F669C64B972B3A065EF7DD4BDEFFFE17E63DB8898FA6E69166B710AAD6BA2EA9AF61E4B8C8701638D4D6E4DFFFC192AEF6BC027095C4C72D748979675BA29FAF61E75343E14E61034602E5A79CD2519796ED6A9CC4EDEA46A9B59D4A807E786B5EE46F25B0360BC8E7C12D723122CDEEF247C9776F4C99C8EBED6828AA19744B5ADF0D07D95D98B3072372388D41B0FAB1CCE2775170679575ECDCA13B22A17FE9C6605C3445F58F1A829512DAB6C528F83580C8AA53C35D605F626F5AD0B7FC1EA87D69A835E3F53A1F450FB0AF42A5772F89D92A50D10F15BDBDA409F50C0B8AB93FE8A16D029DD8BB5C480D1466735ED4D9CAF637E5ECD6C2ECB6BF3B3EFBEE7AB936D2C568E3009D156B87CACB1FB3A48A70BC91B2EC35CC9147FFB1A524E2B2F2E4E2C1B12F1C1C63768BB95CD62FEC01CBA79B9FA282DD4DF49990F27FF8EE4E2DDE2F0ACD83BC9D4BE0090192C7A799967EC4DC2D63C0835E22D4C4B366D7FDCF3A05A4B53DF780F986EF25C79B665D5C00EFF7F17C0BB6D544F9D83A7FDAC47D9C5683A656011374253C918FF6EA64749DD971B2300DD5320033E01EC591F6318CCE94CE2B81C04322EC52B624E50643B52391CCD2AB56396A2AD8E2D3CA61B80D9D4CC363B2DF7863526958CDF3497E36648406C317E58EC563E7C26149A2A3C643ADFB39A8DD92974C6D2A2A9D7B71CDF3FEBBF32BB02E7B45CF53AAEAD5E963A4AA4AF9A149A08A4EC303D5F2369977E93F54897EEAD31B06C5845D63F49D65F8E5573962241A57CCD717CE6CA8C784A11192943616EA059B51BC38429E18D0121FCBB6FBD5D909B0D89E616C66DEF6A0F165A7030BD911A1B120468329CBB006C8D37720E531CF31E878CB4AAAC137633675C3D546F5162487AB35F470C042BDEB945E0F2532BF92AA6FD53434440221ECD3533A7AA89900CB19EFE2CD872DF8B7969AF0D3B72BF31DC5DD69CA6460966F61AB17CB507964098DBA3AF122EEC3128A9BAFE1034493F372B36BD1351205E9043A67C544402D8BCE24358C8A5CE33867A00794CF7097D59C88279A11EE9C854E7E7AAE881F9828C569D208F5F33375F59E9A3818CFA38AAD0CBFBA32F9F44A8BB79DE4C40E3886457C16DA4A27953AA1E99472E35F2323F0BAA5E37DC28CBA46FEFB73B190016055ADD4D27615D748499A0E1C4B8C7EC339C1C4D95A813A85918A8D01EEB485DDCDCEA6EA3F2C2A9D85C139CD90CCB352634F9AFE836BCAC0C274E352BA2071B5269D5DE4CCDE3FF990CBA974980C7332AE1545A9C60D5D1459D3AE95C1AC065733AF14FADB440A110DD539563B8D850CD0704C52F3F7CCCB53630D776560CBD22D8FF08F5B354487A171AEC15F5F54DE9CAB668BCAC573E788D92762EF63E76087005F4AC2D02E0CAC173C11BE62ACE5DC4D3374F2F9746C9981E125FF9AB8CAE76D13039E2C54DFD708E028A619EA1ED78E6B46F06DF0D0B74BBEDD8C190C7C0CEBDE8F7A4888CC36575313478DD2CFE392E9BB7B2416955D44B7024A3BA43FBF37293B386D64746D7748895411D243FAEC50638F2AA33337D7FA018ADDAC5835A0DDFAE99AD6299DFB4CA6872C59853E3AC12FC9E3D26629C5B49CF844C87B3C4BFBE3074E3A1CE6984758C20C661084381CD6B4582D84F19C0000B5FC0DCB42B567E396031601C095D7016283EBE5F13CD8A3A374A74DDBBABD36081149F8BC242085F2F7297CC97FD3B8BAD206D8AC9707A39ECCC7963B522E08DA391A1EF12DD4D746DBDDDCC0834F88160CF189A9645567CEC2F023A571AF0DFD15DB85B744C28C000DF53B05F8F210841F6E87A04F20C777B7C0BE6182BE2E90226E5301A12532A745F2FAAA81637CF11B78CD2B99A4D18B862D6C5DBD31793FB16A2D9AAD376D4484D75AA833D0068B1D34DB74E3302480854E3B5484D8A47E39A89A2FA927BC3641EA7F8E004FDE4C2F08D40D99F1ACB47CAF6887629BF6DFE12968D297596D28CE0CF148B12E7DCB49FB94F5ADBD214C3A6CE1E249831BA9EB8A189F2CE1ABE39A7B537253E369A508A2AF2ADB9463F9B56BBBFF31D535FF997F537C6675C196E7ECBD493F652FA7CC6D9C1CA3379BFDB5AF7513C6E834054494296B91A6EE800114363D5D5D0759F41B4DECB653B9DE3E94583579EF549ED5F3FAFB12661ABC0C57A332406517ED3454EDED34B386C60F78DC976266E0EAF54FC245FB0E3EFC8016236436B599C1C97A8C5E0AC8F7836161873C71F01ED9CC25C236420F41FD8277993D3959205912FA0927B59E3DAE7377D82079447D6E41EE5AEC0DFFF79AF8F4ED47F17EE708FEA45877860D56F8CBCE65A061E8E1CA4A5FBAF0E13429A7F0ADB6F178FA449F46CC539BBC0107E3A53B1C362A04B20E6D721E7E6E1E4976A11DDC98C7614D22B53DFBB6DAE533AC9BE882021A735C30DAA4A44AED09F49A390E8CFF59BD9C30667AF21B03EC5CEBD5C2C3AA2769E8D714191A48E7DDF50B13D1560E82EFB65FCE601AE9E8C351FBA1DED80B7351314E7F9F9A784BFE3759B7E322A84E7B51F9DC5F5D9C8050CD79B27C0A4B0DD68A3C27A948AD6858E35B960D2DEA838C479CAEA83B1A912174ACB2100E55E7A14892D7A9B3711FF0B20065C1995B49E1F23464A92DD140642E3A7B1973849E64D1A3CF60000000000000000000000000000000000000000000000000000000000000000
  481. 0000000000000000000000000000000000000000000000000000000000000000
  482. 0000000000000000000000000000000000000000000000000000000000000000
  483. 0000000000000000000000000000000000000000000000000000000000000000
  484. 0000000000000000000000000000000000000000000000000000000000000000
  485. 0000000000000000000000000000000000000000000000000000000000000000
  486. 0000000000000000000000000000000000000000000000000000000000000000
  487. 0000000000000000000000000000000000000000000000000000000000000000
  488. cleartomark
  489.  %endeexec
  490.  
  491. %%EndProcSet
  492. %iddDict v1.5
  493. /iddDict dup where 
  494.     {
  495.         pop pop
  496.     }
  497.     {
  498.     /iddDictlen 80 def
  499.     userdict exch iddDictlen dict dup begin put
  500.  
  501.     /_gs /gsave load def
  502.     /_gr /grestore load def
  503.     /_mt /moveto load def
  504.     /_lt /lineto load def
  505.     /_sd /setdash load def
  506.     /_lc /setlinecap load def
  507.     /_sc /setrgbcolor load def
  508.     /_lw /setlinewidth load def
  509.     /_st /stroke load def
  510.     /_ef /eofill load def
  511.     /_c /closepath load def
  512.     /_n /newpath load def
  513.     /_tr /translate load def
  514.     /_rt /rotate load def
  515.     /_cm /currentmatrix load def
  516.     /_sg /setgray load def
  517.     /_ct /curveto load def
  518.     /rc /cleartomark load def
  519.     /kp /pop load def
  520.     /INF 1.0 def
  521.     /b 
  522.         {
  523.         bind def 
  524.         } dup exec
  525.     /x 
  526.         {
  527.         exch def 
  528.         } b
  529.     /regmark {
  530.         gsave
  531.             0.24 setlinewidth 0 setgray
  532.             translate
  533.             gsave
  534.                 1 1 4 {
  535.                     pop
  536.                     90 rotate
  537.                     newpath 0 0 moveto
  538.                     13.5 0 rlineto stroke
  539.                 } for
  540.             grestore
  541.             newpath 0 0 moveto
  542.             0 0 9 0 360 arc stroke
  543.         grestore
  544.     } b
  545.     /doRegMarks {
  546.         gsave
  547.             matrix defaultmatrix setmatrix
  548.             initclip
  549.             /clipbox [ clippath pathbbox ] def
  550.  
  551.             clipbox 0 get 18 add clipbox 1 get 18 add regmark
  552.             clipbox 0 get 18 add clipbox 3 get 18 sub regmark
  553.             clipbox 2 get 18 sub clipbox 3 get 18 sub regmark
  554.             clipbox 2 get 18 sub clipbox 1 get 18 add regmark
  555.         grestore
  556.     } b
  557.     /cutmark {
  558.         gsave
  559.             0.24 setlinewidth 0 setgray
  560.             3 1 roll
  561.             translate
  562.             rotate
  563.             newpath
  564.             0 0 moveto
  565.             18 0 rlineto stroke
  566.             0 0 moveto
  567.             0 18 rlineto stroke
  568.         grestore
  569.     } b
  570.     /doCutMarks {
  571.         gsave
  572.             matrix defaultmatrix setmatrix
  573.             initclip
  574.             /clipbox [ clippath pathbbox ] def
  575.  
  576.             clipbox 0 get clipbox 1 get 0 cutmark
  577.             clipbox 0 get clipbox 3 get -90 cutmark
  578.             clipbox 2 get clipbox 3 get 180 cutmark
  579.             clipbox 2 get clipbox 1 get 90 cutmark
  580.         grestore
  581.     } b
  582.     /hyp 
  583.         {
  584.         dup mul exch dup mul add sqrt 
  585.         } b
  586.     /idd_null 
  587.         {
  588.         } def
  589.  
  590.     /idd_fills
  591.     [
  592.             /idd_null load
  593.             /fill load
  594.             { fillcode setgray fillred fillgreen fillblue setrgbcolor fill }
  595.         ]
  596.     def
  597.     /realtype? 
  598.         {
  599.         dup type /realtype eq 
  600.         } b
  601.     /idd_fill
  602.         {
  603.         gsave
  604.         fillcode realtype? 
  605.             {
  606.             pop 2 
  607.             } if
  608.         idd_fills exch get exec
  609.         grestore
  610.         }
  611.     b
  612.     /idd_dopath
  613.         {
  614.         idd_fill
  615.         emred emgreen emblue setrgbcolor stroke
  616.         }
  617.     b
  618.     /idd_doslash
  619.         {
  620.         slash
  621.         fillcode realtype? 
  622.             {
  623.             pop strokepath 
  624.             }
  625.         if
  626.         }
  627.     b
  628.     /slash
  629.         {
  630.         ht neg wd neg moveto
  631.         ht wd lineto
  632.         }
  633.     b
  634.     /idd_emary
  635.     [
  636.             {
  637.                 newpath 0 0 wd 0 360 arc
  638.             }
  639.             {            
  640.                     ht neg wd lineto
  641.                     ht tail neg rlineto
  642.                     ht wd lineto
  643.                     closepath
  644.             }
  645.  
  646.             /idd_doslash load
  647.             {            
  648.                     slash
  649.                     90 rotate
  650.                     idd_doslash            
  651.             }    
  652.         ]
  653.     def
  654.     /idd_doendmark
  655.         {
  656.             /scode x
  657.             4 copy
  658.             3 -1 roll sub exch 3 -1 roll sub
  659.             2 copy 0 ne exch 0 ne or
  660.             {
  661.                 /xd x
  662.                 neg /yd x
  663.                 gsave    
  664.                     /p2y x /p2x x /p1y x /p1x x
  665.                     /wd x /ht x  /tail x /head x  
  666.                     setlinewidth
  667.                     /fillcode x
  668.                     /emblue x
  669.                     /emgreen x
  670.                     /emred x
  671.                     /fillblue x
  672.                     /fillgreen x
  673.                     /fillred x
  674.                     
  675.                     p2x p2y translate 0 0 moveto
  676.                     scode 0 gt 
  677.                         {
  678.                              xd yd atan rotate     
  679.                         }
  680.                     if
  681.                     idd_emary scode get exec
  682.                     idd_dopath
  683.                 grestore
  684.             }
  685.             {
  686.                 mark 19 1 roll
  687.                 cleartomark
  688.             }
  689.             ifelse
  690.         }
  691.         b
  692.     end
  693.     
  694.     }
  695. ifelse
  696.